home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er Special 4
/
64er_Magazin_Sonderheft_04_86-04_1986_Markt__Technik_de_Disk_1_of_2_Side_A.d64
/
listing 13.d
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
219b
|
10 lines
10000 rem fruechte-datei deffinieren -------------------------------------------
10010 sz=8 :rem anzahl der saetze
10020 dim d$(sz):rem string-feld
10030 open2,8,2,"daten-file,s,r"
10040 fori=1tosz
10050 :input#2,d$(i)
10060 nexti
10070 close2
10080 return